Computer Shopper 188

home *** CD-ROM | disk | FTP | other *** search

/ Computer Shopper 188 - Disc 1 / dpcs1003a.iso / Cafe / NoteTab / NoteTab_Setup.exe / {app} / NoteTab.exe / 0 / RCDATA / TFRMPRINT / TFRMPRINT.txt < prev

Wrap

Text File | 2003-05-22 | 18.0 KB | 727 lines

object frmPrint: TfrmPrint Left = 257 Top = 156 Hint = '|Print...' HorzScrollBar.Visible = False VertScrollBar.Visible = False ActiveControl = rbtAll AutoScroll = False BorderIcons = [biSystemMenu] Caption = 'Print' ClientHeight = 250 ClientWidth = 450 Color = clBtnFace Constraints.MaxHeight = 277 Constraints.MaxWidth = 458 Constraints.MinHeight = 277 Constraints.MinWidth = 458 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {<image000.ico>} OldCreateOrder = True Position = poScreenCenter Scaled = False OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object pgcPrint: TPageControl Left = 8 Top = 8 Width = 433 Height = 233 ActivePage = tbsPrint TabOrder = 0 object tbsPrint: TTabSheet Caption = 'Print' object gbxPrintRange: TGroupBox Left = 8 Top = 12 Width = 313 Height = 105 Caption = 'Print Range' TabOrder = 0 object lbl_edtFrom: TEnhLabel Left = 101 Top = 51 Width = 23 Height = 13 Caption = '&from:' FocusControl = edtFrom end object lbl_edtTo: TEnhLabel Left = 218 Top = 51 Width = 12 Height = 13 Caption = 't&o:' FocusControl = edtTo end object lbl_cmbPrintPages: TEnhLabel Left = 92 Top = 19 Width = 65 Height = 13 Caption = '&Duplex mode:' FocusControl = cmbPrintPages end object rbtAll: TRadioButton Left = 8 Top = 22 Width = 65 Height = 17 Hint = '|Print all document' Caption = '&All' Checked = True TabOrder = 0 TabStop = True OnClick = NewValues end object rbtPages: TRadioButton Left = 8 Top = 50 Width = 81 Height = 17 Hint = '|Print selected page range' Caption = '&Pages' Enabled = False TabOrder = 1 OnClick = rbtPagesClick end object edtFrom: TLblEdit Left = 144 Top = 48 Width = 41 Height = 21 Hint = '|Start printing from' MaxLength = 5 TabOrder = 2 Text = '1' OnKeyPress = CheckInteger OnEdited = SetPages LabelPos = lpCustom LabelMargin = 4 LabelComponent = lbl_edtFrom LabelRelLeft = -43 LabelRelTop = 3 end object edtTo: TLblEdit Left = 244 Top = 48 Width = 41 Height = 21 Hint = '|Last page to print (0 means till the end)' MaxLength = 5 TabOrder = 3 OnKeyPress = CheckInteger OnEdited = SetPages LabelPos = lpCustom LabelMargin = 4 LabelComponent = lbl_edtTo LabelRelLeft = -26 LabelRelTop = 3 end object rbtSelection: TRadioButton Left = 8 Top = 77 Width = 105 Height = 17 Hint = '|Print only selected text' Caption = '&Selection' Enabled = False TabOrder = 4 OnClick = NewValues end object cmbPrintPages: TLblComboBox Left = 180 Top = 16 Width = 105 Height = 21 Hint = '|Select whether to print even, odd, or all pages in chosen range' ItemHeight = 13 TabOrder = 5 Items.Strings = ( 'Even and Odd' 'Odd only' 'Even only') AddNewToStart = False AddNewToList = False AllowNull = False CaseSensitive = False DestroyObjects = False LimitToList = True ReadOnly = False LabelPos = lpCustom LabelComponent = lbl_cmbPrintPages LabelRelLeft = -88 LabelRelTop = 3 end end object gbxCopies: TGroupBox Left = 8 Top = 124 Width = 313 Height = 49 Caption = 'Copies' TabOrder = 1 object lbl_edtCopies: TEnhLabel Left = 8 Top = 19 Width = 87 Height = 13 Caption = 'Number of &Copies:' FocusControl = edtCopies end object edtCopies: TLblEdit Left = 120 Top = 16 Width = 41 Height = 21 Hint = '|Number of copies to print' MaxLength = 4 TabOrder = 0 Text = '1' OnKeyPress = CheckInteger OnEdited = NewValues LabelPos = lpCustom LabelComponent = lbl_edtCopies LabelRelLeft = -112 LabelRelTop = 3 end object cbxCollate: TCheckBox Left = 220 Top = 18 Width = 85 Height = 17 Hint = '|Prints copies in page number order when checked' Caption = 'Collat&e' TabOrder = 1 OnClick = NewValues end end object cbxPrintToFile: TCheckBox Left = 12 Top = 180 Width = 125 Height = 17 Hint = '|Print to file instead of printer' Caption = 'P&rint To File' TabOrder = 2 OnClick = NewValues end object cbxLandscape: TCheckBox Left = 176 Top = 180 Width = 105 Height = 17 Hint = '|When checked, the print job prints horizontally on the page' Caption = '&Landscape' TabOrder = 3 OnClick = NewValues end end object tbsMargins: TTabSheet Caption = 'Margins' object Bevel1: TBevel Left = 8 Top = 8 Width = 313 Height = 57 Shape = bsFrame end object lbl_cmbUnits: TEnhLabel Left = 20 Top = 17 Width = 27 Height = 13 Caption = '&Units:' FocusControl = cmbUnits end object gbxMargins: TGroupBox Left = 8 Top = 84 Width = 241 Height = 109 Caption = 'Margins' TabOrder = 2 object lbl_edtLeft: TEnhLabel Left = 12 Top = 17 Width = 21 Height = 13 Caption = '&Left:' FocusControl = edtLeft end object lbl_edtRight: TEnhLabel Left = 140 Top = 17 Width = 28 Height = 13 Caption = '&Right:' FocusControl = edtRight end object lbl_edtTop: TEnhLabel Left = 12 Top = 61 Width = 22 Height = 13 Caption = '&Top:' FocusControl = edtTop end object lbl_edtBottom: TEnhLabel Left = 140 Top = 61 Width = 36 Height = 13 Caption = '&Bottom:' FocusControl = edtBottom end object edtLeft: TLblEdit Left = 12 Top = 32 Width = 89 Height = 21 Hint = '|Size of left margin' MaxLength = 6 TabOrder = 0 Text = '0' OnKeyPress = CheckMargins OnEdited = NewValues LabelPos = lpTop LabelMargin = 2 LabelComponent = lbl_edtLeft LabelRelLeft = 0 LabelRelTop = -15 end object edtRight: TLblEdit Left = 140 Top = 32 Width = 89 Height = 21 Hint = '|Size of right margin' MaxLength = 6 TabOrder = 1 Text = '0' OnKeyPress = CheckMargins OnEdited = NewValues LabelPos = lpTop LabelMargin = 2 LabelComponent = lbl_edtRight LabelRelLeft = 0 LabelRelTop = -15 end object edtTop: TLblEdit Left = 12 Top = 76 Width = 89 Height = 21 Hint = '|Size of top margin' MaxLength = 6 TabOrder = 2 Text = '0' OnKeyPress = CheckMargins OnEdited = NewValues LabelPos = lpTop LabelMargin = 2 LabelComponent = lbl_edtTop LabelRelLeft = 0 LabelRelTop = -15 end object edtBottom: TLblEdit Left = 140 Top = 76 Width = 89 Height = 21 Hint = '|Size of bottom margin' MaxLength = 6 TabOrder = 3 Text = '0' OnKeyPress = CheckMargins OnEdited = NewValues LabelPos = lpTop LabelMargin = 2 LabelComponent = lbl_edtBottom LabelRelLeft = 0 LabelRelTop = -15 end end object cmbUnits: TLblComboBox Left = 20 Top = 32 Width = 157 Height = 21 Hint = '|Units of measurement used for margins' DropDownCount = 3 ItemHeight = 13 TabOrder = 0 Items.Strings = ( 'Inches' 'Centimeters' 'Pixels') AddNewToStart = False AddNewToList = False AllowNull = False CaseSensitive = False DestroyObjects = False LimitToList = True ReadOnly = False OnListPick = cmbUnitsListPick LabelPos = lpTop LabelMargin = 2 LabelComponent = lbl_cmbUnits LabelRelLeft = 0 LabelRelTop = -15 end object cbxWordWrap: TCheckBox Left = 208 Top = 32 Width = 105 Height = 17 Hint = '|Wrap long lines' Caption = '&Word Wrap' TabOrder = 1 OnClick = NewValues end end object tbsFont: TTabSheet Caption = 'Font' object Bevel3: TBevel Left = 8 Top = 8 Width = 313 Height = 185 Shape = bsFrame end object lbl_edtFontPreview: TEnhLabel Left = 24 Top = 65 Width = 98 Height = 13 Caption = 'Preview Printer Font:' FocusControl = edtFontPreview end object btnPrinterFont: TFontButton Left = 24 Top = 24 Width = 89 Height = 25 Hint = 'Select printer font' Caption = '&Font...' TabOrder = 0 RefFont.Charset = DEFAULT_CHARSET RefFont.Color = clWindowText RefFont.Height = -11 RefFont.Name = 'MS Sans Serif' RefFont.Style = [] FontDialog = vclFontDialog OnChanged = UncheckDocFont end object cbxDocFont: TCheckBox Left = 152 Top = 28 Width = 153 Height = 17 Hint = 'Use current document font instead of printer font' Caption = '&Use Document Font' TabOrder = 1 OnClick = NewValues end object edtFontPreview: TLblMemo Left = 24 Top = 80 Width = 281 Height = 101 Hint = '|Preview printer font' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Courier New' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 2 WordWrap = False LabelPos = lpTop LabelMargin = 2 LabelComponent = lbl_edtFontPreview LabelRelLeft = 0 LabelRelTop = -15 end end object tbsOther: TTabSheet Caption = 'Other' object Bevel2: TBevel Left = 8 Top = 120 Width = 313 Height = 75 Shape = bsFrame end object lbl_edtTitle: TEnhLabel Left = 17 Top = 134 Width = 23 Height = 13 Caption = '&Title:' FocusControl = edtTitle end object lbl_edtDateFilter: TEnhLabel Left = 17 Top = 167 Width = 51 Height = 13 Caption = '&Date Filter:' FocusControl = edtDateFilter end object gbxOther: TGroupBox Left = 8 Top = 4 Width = 313 Height = 105 Caption = 'Header and Footer' TabOrder = 0 object lbl_cmbPageNumbers: TEnhLabel Left = 12 Top = 17 Width = 73 Height = 13 Caption = 'Page &Numbers:' FocusControl = cmbPageNumbers end object lbl_edtNumberFormat: TEnhLabel Left = 12 Top = 57 Width = 75 Height = 13 Caption = 'N&umber Format:' FocusControl = edtNumberFormat end object lbl_cmbHeader: TEnhLabel Left = 164 Top = 17 Width = 38 Height = 13 Caption = '&Header:' FocusControl = cmbHeader end object lbl_cmbFooter: TEnhLabel Left = 164 Top = 57 Width = 33 Height = 13 Caption = '&Footer:' FocusControl = cmbFooter end object cmbPageNumbers: TLblComboBox Left = 12 Top = 32 Width = 133 Height = 21 Hint = '|Page numbers and their position' DropDownCount = 7 ItemHeight = 13 TabOrder = 0 Items.Strings = ( '[None]' 'Top, left' 'Top, right' 'Top, center' 'Bottom, left' 'Bottom, right' 'Bottom, center') AddNewToStart = False AddNewToList = False AllowNull = False AutoPickItem = False CaseSensitive = False DestroyObjects = False LimitToList = True ReadOnly = False OnListPick = NewValues LabelPos = lpTop LabelMargin = 2 LabelComponent = lbl_cmbPageNumbers LabelRelLeft = 0 LabelRelTop = -15 end object edtNumberFormat: TLblEdit Left = 12 Top = 72 Width = 133 Height = 21 Hint = '|Format of page number (%d indicates number position)' MaxLength = 20 TabOrder = 1 Text = '%d' OnEdited = NewValues LabelPos = lpTop LabelMargin = 2 LabelComponent = lbl_edtNumberFormat LabelRelLeft = 0 LabelRelTop = -15 end object cmbHeader: TLblComboBox Left = 164 Top = 32 Width = 137 Height = 21 Hint = '|Information to print as header' DropDownCount = 5 ItemHeight = 13 TabOrder = 2 Items.Strings = ( '[None]' 'Date' 'Title' 'Date + Title' 'Title + Date') AddNewToStart = False AddNewToList = False AllowNull = False CaseSensitive = False DestroyObjects = False LimitToList = True ReadOnly = False OnListPick = NewValues LabelPos = lpTop LabelMargin = 2 LabelComponent = lbl_cmbHeader LabelRelLeft = 0 LabelRelTop = -15 end object cmbFooter: TLblComboBox Left = 164 Top = 72 Width = 137 Height = 21 Hint = '|Information to print as footer' DropDownCount = 5 ItemHeight = 13 TabOrder = 3 Items.Strings = ( '[None]' 'Date' 'Title' 'Date + Title' 'Title + Date') AddNewToStart = False AddNewToList = False AllowNull = False CaseSensitive = False DestroyObjects = False LimitToList = True ReadOnly = False OnListPick = NewValues LabelPos = lpTop LabelMargin = 2 LabelComponent = lbl_cmbFooter LabelRelLeft = 0 LabelRelTop = -15 end end object edtTitle: TLblEdit Left = 64 Top = 131 Width = 241 Height = 21 Hint = '|Text used for header or footer (if enabled)' TabOrder = 1 OnEdited = NewValues LabelPos = lpCustom LabelComponent = lbl_edtTitle LabelRelLeft = -47 LabelRelTop = 3 end object edtDateFilter: TLblEdit Left = 96 Top = 164 Width = 209 Height = 21 Hint = '|Format the date and time string according to filter' HelpContext = 8 MaxLength = 80 TabOrder = 2 OnEdited = NewValues LabelPos = lpCustom LabelComponent = lbl_edtDateFilter LabelRelLeft = -79 LabelRelTop = 3 end end end object btnHelp: TButton Left = 352 Top = 50 Width = 79 Height = 25 Caption = 'Help' TabOrder = 1 Visible = False OnClick = btnHelpClick end object btnCancel: TButton Left = 352 Top = 202 Width = 79 Height = 25 Hint = '|Cancel printing and changes to settings' Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 5 OnClick = btnCancelClick end object btnClose: TButton Left = 352 Top = 174 Width = 79 Height = 25 Hint = '|Save options and close dialog box without printing' Caption = 'Save' Default = True ModalResult = 1 TabOrder = 3 Visible = False OnClick = btnOkClick end object btnOk: TButton Left = 352 Top = 174 Width = 79 Height = 25 Hint = '|Save settings and Start printing' Caption = 'Print' Default = True ModalResult = 1 TabOrder = 4 OnClick = btnOkClick end object btnSetup: TButton Left = 352 Top = 128 Width = 79 Height = 25 Hint = '|Change the printer and/or printer options' Caption = 'Setup...' TabOrder = 2 OnClick = btnSetupClick end object vclFontDialog: TFontDialog Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Device = fdBoth MinFontSize = 0 MaxFontSize = 0 Options = [] Left = 408 Top = 88 end end